home *** CD-ROM | disk | FTP | other *** search
/ Know Your Hockey - The Greatest Player Resource / Know Your Hockey: The Greatest Player Resource.iso / hockey / director / ssqcst.cst / 00051_Script_BigCard < prev    next >
Text File  |  1998-09-28  |  653b  |  20 lines

  1. global gTheBench,gXCast
  2. -- plays the card title if you click on it
  3. -- attached to the large cards when they are loaded in LoadEM
  4.  
  5. on MouseDown
  6.   puppetsound 0
  7.   set the movietime of sprite 48 = 0
  8.   set  TheSound = getaprop(gTheBench,#title)
  9.   set positionList = getaProp(gTheBench,#video)
  10.   -- find which large card is on the screen 
  11.   set selection = the name of member (the membernum of sprite 48) of castlib gXCast
  12.   set which = getPos(positionList,selection)
  13.   set playit = getat ( TheSound,which)
  14.   puppetsound playit
  15.   updateStage
  16.   repeat while soundbusy(1)
  17.   end repeat
  18.   puppetsound 0
  19.   set the movierate of sprite 48 = 1
  20. end